home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1998 September
/
CHIP Eylül 1998.iso
/
demolar
/
lokman
/
DISK1
/
_SETUP.2
/
Group1
/
Tarihdll.dll
/
0
/
RCDATA
/
TKTANIMFORM
/
TKTANIMFORM.txt
Wrap
Text File
|
1998-07-24
|
48KB
|
1,900 lines
object KTanimForm: TKTanimForm
Left = 1
Top = 6
Width = 638
Height = 441
Caption = 'Kurum Listeleri Tan�mlama'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Panel2: TPanel
Left = 209
Top = 0
Width = 421
Height = 246
Align = alClient
BevelInner = bvLowered
BorderWidth = 3
Caption = 'Panel2'
Color = clNavy
TabOrder = 0
object ScrollBox: TScrollBox
Left = 5
Top = 5
Width = 411
Height = 236
HorzScrollBar.Margin = 6
VertScrollBar.Margin = 6
Align = alClient
AutoScroll = False
BorderStyle = bsNone
Color = clSilver
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 0
object Label17: TLabel
Left = 1
Top = 35
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '1.KOLON'
end
object Label18: TLabel
Left = 1
Top = 57
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '2.KOLON'
end
object Label19: TLabel
Left = 1
Top = 79
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '3.KOLON'
end
object Label20: TLabel
Left = 1
Top = 101
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '4.KOLON'
end
object Label21: TLabel
Left = 1
Top = 123
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '5.KOLON'
end
object Label22: TLabel
Left = 1
Top = 145
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '6.KOLON'
end
object Label23: TLabel
Left = 1
Top = 167
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '7.KOLON'
end
object Label24: TLabel
Left = 1
Top = 189
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '8.KOLON'
end
object Label25: TLabel
Left = 1
Top = 211
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '9.KOLON'
end
object Label35: TLabel
Left = 329
Top = 15
Width = 81
Height = 14
Caption = 'GEN��L�K (mm)'
Font.Color = clRed
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
end
object Label1: TLabel
Left = 66
Top = 15
Width = 96
Height = 14
Caption = ' KOLON ��ER��� '
Font.Color = clRed
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
end
object Label16: TLabel
Left = 212
Top = 15
Width = 110
Height = 14
Alignment = taCenter
Caption = ' KOLON BA�LI�I ADI '
Font.Color = clRed
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
end
object Label5: TLabel
Left = 0
Top = 0
Width = 411
Height = 14
Align = alTop
Alignment = taCenter
Caption = 'L�STE KOLON B�LG�LER�'
Color = clRed
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object EditGEN2: TDBEdit
Left = 342
Top = 54
Width = 55
Height = 22
DataField = 'GENIS2'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 5
end
object EditGEN3: TDBEdit
Left = 342
Top = 76
Width = 55
Height = 22
DataField = 'GENIS3'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 8
end
object EditGEN4: TDBEdit
Left = 342
Top = 98
Width = 55
Height = 22
DataField = 'GENIS4'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 11
end
object EditGEN5: TDBEdit
Left = 342
Top = 120
Width = 55
Height = 22
DataField = 'GENIS5'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 14
end
object EditGEN6: TDBEdit
Left = 342
Top = 142
Width = 55
Height = 22
DataField = 'GENIS6'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 17
end
object EditGEN7: TDBEdit
Left = 342
Top = 164
Width = 55
Height = 22
DataField = 'GENIS7'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 20
end
object EditGEN8: TDBEdit
Left = 342
Top = 186
Width = 55
Height = 22
DataField = 'GENIS8'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 23
end
object EditGEN9: TDBEdit
Left = 342
Top = 208
Width = 55
Height = 22
DataField = 'GENIS9'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 26
end
object EditGEN1: TDBEdit
Left = 342
Top = 32
Width = 55
Height = 22
DataField = 'GENIS1'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 2
end
object DBComboBox1: TDBComboBox
Left = 58
Top = 31
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN1'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'RE�ETE SER� NO'
'R�.KAYIT DEF.NO'
'')
TabOrder = 0
OnExit = DBComboBox1Exit
end
object DBComboBox2: TDBComboBox
Left = 58
Top = 53
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN2'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'RE�ETE SER� NO'
'R�.KAYIT DEF.NO'
'')
TabOrder = 3
OnExit = DBComboBox1Exit
end
object DBComboBox3: TDBComboBox
Left = 58
Top = 75
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN3'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'RE�ETE SER� NO'
'R�.KAYIT DEF.NO'
'')
TabOrder = 6
OnExit = DBComboBox1Exit
end
object DBComboBox4: TDBComboBox
Left = 58
Top = 97
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN4'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'RE�ETE SER� NO'
'R�.KAYIT DEF.NO'
'')
TabOrder = 9
OnExit = DBComboBox1Exit
end
object DBComboBox5: TDBComboBox
Left = 58
Top = 119
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN5'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'RE�ETE SER� NO'
'R�.KAYIT DEF.NO'
'')
TabOrder = 12
OnExit = DBComboBox1Exit
end
object DBComboBox6: TDBComboBox
Left = 58
Top = 141
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN6'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'RE�ETE SER� NO'
'R�.KAYIT DEF.NO'
'')
TabOrder = 15
OnExit = DBComboBox1Exit
end
object DBComboBox7: TDBComboBox
Left = 58
Top = 163
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN7'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'RE�ETE SER� NO'
'R�.KAYIT DEF.NO'
'')
TabOrder = 18
OnExit = DBComboBox1Exit
end
object DBComboBox8: TDBComboBox
Left = 58
Top = 185
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN8'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'RE�ETE SER� NO'
'R�.KAYIT DEF.NO'
'')
TabOrder = 21
OnExit = DBComboBox1Exit
end
object DBComboBox9: TDBComboBox
Left = 58
Top = 208
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN9'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'RE�ETE SER� NO'
'R�.KAYIT DEF.NO'
'')
TabOrder = 24
OnExit = DBComboBox1Exit
end
object DBEdit1: TDBEdit
Left = 211
Top = 32
Width = 121
Height = 22
DataField = 'CAPTION1'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 1
end
object DBEdit2: TDBEdit
Left = 211
Top = 54
Width = 121
Height = 22
DataField = 'CAPTION2'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 4
end
object DBEdit3: TDBEdit
Left = 211
Top = 76
Width = 121
Height = 22
DataField = 'CAPTION3'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 7
end
object DBEdit4: TDBEdit
Left = 211
Top = 98
Width = 121
Height = 22
DataField = 'CAPTION4'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 10
end
object DBEdit5: TDBEdit
Left = 211
Top = 120
Width = 121
Height = 22
DataField = 'CAPTION5'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 13
end
object DBEdit6: TDBEdit
Left = 211
Top = 142
Width = 121
Height = 22
DataField = 'CAPTION6'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 16
end
object DBEdit7: TDBEdit
Left = 211
Top = 164
Width = 121
Height = 22
DataField = 'CAPTION7'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 19
end
object DBEdit8: TDBEdit
Left = 211
Top = 186
Width = 121
Height = 22
DataField = 'CAPTION8'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 22
end
object DBEdit9: TDBEdit
Left = 211
Top = 207
Width = 121
Height = 22
DataField = 'CAPTION9'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 25
end
object ListBox1: TListBox
Left = 222
Top = 8
Width = 67
Height = 241
ItemHeight = 14
Items.Strings = (
'HASTANO'
'BAS1'
'BAS2'
'BAS3'
'BAS4'
'BAS5'
'BAS6'
'PROTOKOLNO'
'ALTARIH'
'RECTARIH'
'VIZETRH'
'BRUTN'
'BRUTI'
'BRUTO'
'BRUTH'
'BRUTMR'
'BrutOI'
'HKPson'
'NETSON'
'BRUT'
'KRMINDIR'
'IndirN'
'IndirI'
'IndirO'
'IndirH'
'IndirMR'
'SERINO'
'RKDEFTERNO'
'')
TabOrder = 27
Visible = False
end
end
end
object Panel3: TPanel
Left = 0
Top = 246
Width = 630
Height = 168
Align = alBottom
BevelInner = bvLowered
BorderWidth = 3
Caption = 'Panel3'
Color = clNavy
TabOrder = 1
object ScrollBox1: TScrollBox
Left = 5
Top = 5
Width = 620
Height = 158
Align = alClient
BorderStyle = bsNone
Color = clSilver
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 0
object Label4: TLabel
Left = 0
Top = 0
Width = 620
Height = 13
Align = alTop
Alignment = taCenter
Caption = 'L�STE SONU TOPLAMLARI'
Color = clRed
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label6: TLabel
Left = 4
Top = 34
Width = 59
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '1.TOPLAM'
end
object Label7: TLabel
Left = 4
Top = 56
Width = 59
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '2.TOPLAM'
end
object Label8: TLabel
Left = 4
Top = 78
Width = 59
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '3.TOPLAM'
end
object Label9: TLabel
Left = 5
Top = 100
Width = 59
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '4.TOPLAM'
end
object Label10: TLabel
Left = 5
Top = 122
Width = 59
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '5.TOPLAM'
end
object Label11: TLabel
Left = 77
Top = 15
Width = 103
Height = 14
Caption = ' TOPLAM ��ER��� '
Font.Color = clRed
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
end
object Label12: TLabel
Left = 224
Top = 15
Width = 99
Height = 14
Alignment = taCenter
Caption = ' TOPLAM BA�LI�I '
Font.Color = clRed
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
end
object Label13: TLabel
Left = 348
Top = 15
Width = 87
Height = 14
Alignment = taCenter
Caption = 'KOLON H�ZASI '
Font.Color = clRed
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
end
object Label14: TLabel
Left = 476
Top = 15
Width = 120
Height = 14
Alignment = taCenter
Caption = ' TOPLAMLARIN YER� '
Font.Color = clRed
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
end
object Label15: TLabel
Left = 404
Top = 36
Width = 40
Height = 14
Caption = '.KOLON'
end
object Label26: TLabel
Left = 404
Top = 58
Width = 40
Height = 14
Caption = '.KOLON'
end
object Label27: TLabel
Left = 404
Top = 102
Width = 40
Height = 14
Caption = '.KOLON'
end
object Label28: TLabel
Left = 404
Top = 124
Width = 40
Height = 14
Caption = '.KOLON'
end
object Label29: TLabel
Left = 404
Top = 80
Width = 40
Height = 14
Caption = '.KOLON'
end
object DBComboBoxT1: TDBComboBox
Left = 70
Top = 30
Width = 145
Height = 22
Style = csDropDownList
DataField = 'T_ALAN1'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'RE�ETE SAYISI'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'')
TabOrder = 0
end
object DBComboBoxT2: TDBComboBox
Left = 70
Top = 52
Width = 145
Height = 22
Style = csDropDownList
DataField = 'T_ALAN2'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'RE�ETE SAYISI'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'')
TabOrder = 1
end
object DBComboBoxT3: TDBComboBox
Left = 70
Top = 74
Width = 145
Height = 22
Style = csDropDownList
DataField = 'T_ALAN3'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'RE�ETE SAYISI'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'')
TabOrder = 2
end
object EditB1: TDBEdit
Left = 220
Top = 31
Width = 121
Height = 22
DataField = 'T_CAPTION1'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 3
end
object EditB2: TDBEdit
Left = 220
Top = 53
Width = 121
Height = 22
DataField = 'T_CAPTION2'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 4
end
object EditB3: TDBEdit
Left = 220
Top = 75
Width = 121
Height = 22
DataField = 'T_CAPTION3'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 5
end
object DBComboBoxTH1: TDBComboBox
Left = 346
Top = 30
Width = 55
Height = 22
Style = csDropDownList
DataField = 'T_HIZA1'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8'
'9'
'')
TabOrder = 6
end
object DBComboBoxTH2: TDBComboBox
Left = 346
Top = 52
Width = 55
Height = 22
Style = csDropDownList
DataField = 'T_HIZA2'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8'
'9'
'')
TabOrder = 7
end
object DBComboBoxTH3: TDBComboBox
Left = 346
Top = 74
Width = 55
Height = 22
Style = csDropDownList
DataField = 'T_HIZA3'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8'
'9'
'')
TabOrder = 8
end
object DBComboBoxT4: TDBComboBox
Left = 70
Top = 96
Width = 145
Height = 22
Style = csDropDownList
DataField = 'T_ALAN4'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'RE�ETE SAYISI'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'')
TabOrder = 10
end
object DBComboBoxT5: TDBComboBox
Left = 70
Top = 118
Width = 145
Height = 22
Style = csDropDownList
DataField = 'T_ALAN5'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'RE�ETE SAYISI'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA� %'
'RAP.LU �THAL �LA� %'
'(�LA� BER.+�Z.KAT.)%'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'KURUM �ND�R�M TPL.'
'KRM.�ND�R.(�L�.%)'
'KRM.�ND�R.(�L.B.%)'
'KRM.�ND�R.(�.K.%)'
'KRM.�ND�R.(�TH.�L�.%)'
'KRM.�ND�R.(R.LU �TH.�L�.%)'
'')
TabOrder = 11
end
object EditB4: TDBEdit
Left = 220
Top = 97
Width = 121
Height = 22
DataField = 'T_CAPTION4'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 12
end
object EditB5: TDBEdit
Left = 220
Top = 119
Width = 121
Height = 22
DataField = 'T_CAPTION5'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 13
end
object DBComboBoxTH4: TDBComboBox
Left = 346
Top = 96
Width = 55
Height = 22
Style = csDropDownList
DataField = 'T_HIZA4'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8'
'9'
'')
TabOrder = 14
end
object DBComboBoxTH5: TDBComboBox
Left = 346
Top = 118
Width = 55
Height = 22
Style = csDropDownList
DataField = 'T_HIZA5'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8'
'9'
'')
TabOrder = 15
end
object DBRadioGroup1: TDBRadioGroup
Left = 455
Top = 29
Width = 156
Height = 108
DataField = 'KONUM'
DataSource = DS_KOLONB
Items.Strings = (
'Sayfa Sonuna'
'Sayfaya Nakli Yek�n'
'Sayfa Sonu ve Nakli Yk.'
'Raporun En Sonuna'
'Hi�biri')
TabOrder = 16
Values.Strings = (
'S'
'N'
'�'
'R'
'H')
end
object ListBoxT: TListBox
Left = 432
Top = 24
Width = 33
Height = 121
ItemHeight = 14
Items.Strings = (
'HASTANO'
'BRUTN'
'BRUTI'
'BRUTO'
'BRUTH'
'BRUTMR'
'BrutOI'
'HKPson'
'NETSON'
'BRUT'
'KRMINDIR'
'IndirN'
'IndirI'
'IndirO'
'IndirH'
'IndirMR'
'')
TabOrder = 9
Visible = False
end
end
end
object Panel4: TPanel
Left = 0
Top = 0
Width = 209
Height = 246
Align = alLeft
BevelInner = bvLowered
BorderWidth = 3
Caption = 'Panel4'
Color = clRed
TabOrder = 2
object ScrollBox2: TScrollBox
Left = 5
Top = 5
Width = 199
Height = 236
Align = alClient
BorderStyle = bsNone
Color = clNavy
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 0
object Label2: TLabel
Left = 5
Top = 0
Width = 70
Height = 14
Caption = 'KURUM KODU'
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SpeedBKK: TSpeedButton
Left = 106
Top = 16
Width = 22
Height = 20
Hint = 'Kurum Listesi'
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000000000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333333FBFFF
FFFFF000000033333333FBBFFFFBF00000003333333FBFFFFBFFFE0000003333
333FBFFFFBFBF600000033333333FBBFFFFFF70000003333333444FBFFFBF600
000033333344834FBFFFF1000000333334847F84BFFFF6000000333334484F84
FBBFB00000003333348F74483FF3F6000000333344FFF7433333300000003344
8F8444333333300000003448F7433333333330000000348F7733333333333000
000034F77433333333333F000000344443333333333330000000333333333333
333337000000}
ParentShowHint = False
ShowHint = True
OnClick = SpeedBKKClick
end
object Label3: TLabel
Left = 100
Top = 49
Width = 93
Height = 14
Caption = 'Yaz�c� Sol Marjin'
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
end
object Label30: TLabel
Left = 161
Top = 71
Width = 30
Height = 14
Caption = '(mm)'
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label31: TLabel
Left = 8
Top = 124
Width = 123
Height = 16
Caption = 'Kolon Sat�r Y�ksekli�i'
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
end
object Label32: TLabel
Left = 69
Top = 143
Width = 30
Height = 14
Caption = '(mm)'
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object BtnSAKLA: TBitBtn
Left = 112
Top = 206
Width = 81
Height = 25
Caption = 'Sakla'
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = BtnSAKLAClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
555555555555555555555555555555555555555555FF55555555555559055555
55555555577FF5555555555599905555555555557777F5555555555599905555
555555557777FF5555555559999905555555555777777F555555559999990555
5555557777777FF5555557990599905555555777757777F55555790555599055
55557775555777FF5555555555599905555555555557777F5555555555559905
555555555555777FF5555555555559905555555555555777FF55555555555579
05555555555555777FF5555555555557905555555555555777FF555555555555
59905555555555555777555555555555555555555555555555550000}
NumGlyphs = 2
end
object BitBtn1: TBitBtn
Left = 5
Top = 206
Width = 91
Height = 25
Caption = 'Vazge�'
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
Kind = bkClose
Spacing = 1
end
object BitBtn2: TBitBtn
Left = 5
Top = 172
Width = 91
Height = 25
Caption = 'Liste Fontu'
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = BitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333FF3FFFFFFF33FFF003000000033
0000773777777733777703330033033330037FFF77F37F33377F700007330333
3003777777337FFFF77F303003337000007337F77F3377777773303073333033
003337F77F3337F377F337007333303300333777733337FF77F3330033333703
07333377F333377F7733330733333300033333773FF3F3777F33333399393300
033333337737FF777F333333339993307333333333777FF77333333333999930
3333333333777737333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object EditKURUMKOD: TDBEdit
Left = 3
Top = 14
Width = 97
Height = 22
DataField = 'KURUMKOD'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 3
OnChange = EditKURUMKODChange
OnExit = EditKURUMKODExit
end
object DBRadioGrH: TDBRadioGroup
Left = 6
Top = 40
Width = 81
Height = 80
Caption = 'HastaTipi'
Color = clSilver
DataField = 'HASTATIP'
DataSource = DS_KOLONB
Items.Strings = (
'�al��an'
'Emekli'
'Rap./Yat.'
'Normal'
'Di�er')
ParentColor = False
TabOrder = 4
Values.Strings = (
'�'
'E'
'R'
'N'
'D')
end
object EditMARJIN: TDBEdit
Left = 100
Top = 67
Width = 57
Height = 22
DataField = 'MARJIN'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 5
end
object EditSATIRUZ: TDBEdit
Left = 8
Top = 141
Width = 57
Height = 22
DataField = 'SATIRUZ'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 6
end
object BitBtn3: TBitBtn
Left = 112
Top = 172
Width = 81
Height = 25
Hint = 'Yard�m'
HelpContext = 140
Caption = 'Yard�m'
ParentShowHint = False
ShowHint = True
TabOrder = 7
Kind = bkHelp
end
end
end
object TabKOLONB: TTable
BeforePost = TabKOLONBBeforePost
DatabaseName = 'ECZ'
TableName = 'KOLONBAS.db'
Left = 382
Top = 166
object TabKOLONBKURUMKOD: TStringField
DisplayWidth = 13
FieldName = 'KURUMKOD'
Size = 11
end
object TabKOLONBHASTATIP: TStringField
DisplayWidth = 11
FieldName = 'HASTATIP'
Size = 1
end
object TabKOLONBALAN1: TStringField
DisplayWidth = 30
FieldName = 'ALAN1'
Size = 25
end
object TabKOLONBCAPTION1: TStringField
DisplayWidth = 42
FieldName = 'CAPTION1'
Size = 35
end
object TabKOLONBDATA1: TStringField
DisplayWidth = 25
FieldName = 'DATA1'
Size = 21
end
object TabKOLONBGENIS1: TSmallintField
DisplayWidth = 12
FieldName = 'GENIS1'
end
object TabKOLONBALAN2: TStringField
DisplayWidth = 30
FieldName = 'ALAN2'
Size = 25
end
object TabKOLONBCAPTION2: TStringField
DisplayWidth = 42
FieldName = 'CAPTION2'
Size = 35
end
object TabKOLONBDATA2: TStringField
DisplayWidth = 25
FieldName = 'DATA2'
Size = 21
end
object TabKOLONBGENIS2: TSmallintField
DisplayWidth = 12
FieldName = 'GENIS2'
end
object TabKOLONBALAN3: TStringField
DisplayWidth = 30
FieldName = 'ALAN3'
Size = 25
end
object TabKOLONBCAPTION3: TStringField
DisplayWidth = 42
FieldName = 'CAPTION3'
Size = 35
end
object TabKOLONBDATA3: TStringField
DisplayWidth = 25
FieldName = 'DATA3'
Size = 21
end
object TabKOLONBGENIS3: TSmallintField
DisplayWidth = 12
FieldName = 'GENIS3'
end
object TabKOLONBALAN4: TStringField
DisplayWidth = 30
FieldName = 'ALAN4'
Size = 25
end
object TabKOLONBCAPTION4: TStringField
DisplayWidth = 42
FieldName = 'CAPTION4'
Size = 35
end
object TabKOLONBDATA4: TStringField
DisplayWidth = 25
FieldName = 'DATA4'
Size = 21
end
object TabKOLONBGENIS4: TSmallintField
DisplayWidth = 12
FieldName = 'GENIS4'
end
object TabKOLONBALAN5: TStringField
DisplayWidth = 30
FieldName = 'ALAN5'
Size = 25
end
object TabKOLONBCAPTION5: TStringField
DisplayWidth = 42
FieldName = 'CAPTION5'
Size = 35
end
object TabKOLONBDATA5: TStringField
DisplayWidth = 25
FieldName = 'DATA5'
Size = 21
end
object TabKOLONBGENIS5: TSmallintField
DisplayWidth = 12
FieldName = 'GENIS5'
end
object TabKOLONBALAN6: TStringField
DisplayWidth = 30
FieldName = 'ALAN6'
Size = 25
end
object TabKOLONBCAPTION6: TStringField
DisplayWidth = 42
FieldName = 'CAPTION6'
Size = 35
end
object TabKOLONBDATA6: TStringField
DisplayWidth = 25
FieldName = 'DATA6'
Size = 21
end
object TabKOLONBGENIS6: TSmallintField
DisplayWidth = 12
FieldName = 'GENIS6'
end
object TabKOLONBALAN7: TStringField
DisplayWidth = 30
FieldName = 'ALAN7'
Size = 25
end
object TabKOLONBCAPTION7: TStringField
DisplayWidth = 42
FieldName = 'CAPTION7'
Size = 35
end
object TabKOLONBDATA7: TStringField
DisplayWidth = 25
FieldName = 'DATA7'
Size = 21
end
object TabKOLONBGENIS7: TSmallintField
DisplayWidth = 12
FieldName = 'GENIS7'
end
object TabKOLONBALAN8: TStringField
DisplayWidth = 30
FieldName = 'ALAN8'
Size = 25
end
object TabKOLONBCAPTION8: TStringField
DisplayWidth = 42
FieldName = 'CAPTION8'
Size = 35
end
object TabKOLONBDATA8: TStringField
DisplayWidth = 25
FieldName = 'DATA8'
Size = 21
end
object TabKOLONBGENIS8: TSmallintField
DisplayWidth = 12
FieldName = 'GENIS8'
end
object TabKOLONBALAN9: TStringField
DisplayWidth = 30
FieldName = 'ALAN9'
Size = 25
end
object TabKOLONBCAPTION9: TStringField
DisplayWidth = 42
FieldName = 'CAPTION9'
Size = 35
end
object TabKOLONBDATA9: TStringField
DisplayWidth = 25
FieldName = 'DATA9'
Size = 21
end
object TabKOLONBGENIS9: TSmallintField
DisplayWidth = 12
FieldName = 'GENIS9'
end
object TabKOLONBFONTADI: TStringField
FieldName = 'FONTADI'
Size = 35
end
object TabKOLONBSIZE: TSmallintField
FieldName = 'SIZE'
end
object TabKOLONBSTYLE: TStringField
FieldName = 'STYLE'
Size = 1
end
object TabKOLONBCOLOR: TIntegerField
FieldName = 'COLOR'
end
object TabKOLONBMARJIN: TSmallintField
FieldName = 'MARJIN'
end
object TabKOLONBT_ALAN1: TStringField
FieldName = 'T_ALAN1'
Size = 25
end
object TabKOLONBT_CAPTION1: TStringField
FieldName = 'T_CAPTION1'
Size = 35
end
object TabKOLONBT_DATA1: TStringField
FieldName = 'T_DATA1'
Size = 21
end
object TabKOLONBT_HIZA1: TStringField
FieldName = 'T_HIZA1'
Size = 1
end
object TabKOLONBT_ALAN2: TStringField
FieldName = 'T_ALAN2'
Size = 25
end
object TabKOLONBT_CAPTION2: TStringField
FieldName = 'T_CAPTION2'
Size = 35
end
object TabKOLONBT_DATA2: TStringField
FieldName = 'T_DATA2'
Size = 21
end
object TabKOLONBT_HIZA2: TStringField
FieldName = 'T_HIZA2'
Size = 1
end
object TabKOLONBT_ALAN3: TStringField
FieldName = 'T_ALAN3'
Size = 25
end
object TabKOLONBT_CAPTION3: TStringField
FieldName = 'T_CAPTION3'
Size = 35
end
object TabKOLONBT_DATA3: TStringField
FieldName = 'T_DATA3'
Size = 21
end
object TabKOLONBT_HIZA3: TStringField
FieldName = 'T_HIZA3'
Size = 1
end
object TabKOLONBT_ALAN4: TStringField
FieldName = 'T_ALAN4'
Size = 25
end
object TabKOLONBT_CAPTION4: TStringField
FieldName = 'T_CAPTION4'
Size = 35
end
object TabKOLONBT_DATA4: TStringField
FieldName = 'T_DATA4'
Size = 21
end
object TabKOLONBT_HIZA4: TStringField
FieldName = 'T_HIZA4'
Size = 1
end
object TabKOLONBT_ALAN5: TStringField
FieldName = 'T_ALAN5'
Size = 25
end
object TabKOLONBT_CAPTION5: TStringField
FieldName = 'T_CAPTION5'
Size = 35
end
object TabKOLONBT_DATA5: TStringField
FieldName = 'T_DATA5'
Size = 21
end
object TabKOLONBT_HIZA5: TStringField
FieldName = 'T_HIZA5'
Size = 1
end
object TabKOLONBKONUM: TStringField
FieldName = 'KONUM'
Size = 1
end
object TabKOLONBSATIRUZ: TSmallintField
FieldName = 'SATIRUZ'
end
end
object DS_KOLONB: TDataSource
DataSet = TabKOLONB
Left = 390
Top = 134
end
object T_KRMLAR: TTable
DatabaseName = 'ECZ'
ReadOnly = True
TableName = 'Krmlar.DB'
Left = 14
Top = 22
object T_KRMLARKOD: TStringField
FieldName = 'KOD'
Size = 11
end
object T_KRMLARETIKET1: TStringField
FieldName = 'ETIKET1'
Size = 17
end
object T_KRMLARETIKET2: TStringField
FieldName = 'ETIKET2'
Size = 17
end
object T_KRMLARETIKET3: TStringField
FieldName = 'ETIKET3'
Size = 17
end
object T_KRMLARETIKET4: TStringField
FieldName = 'ETIKET4'
Size = 17
end
object T_KRMLARETIKET5: TStringField
FieldName = 'ETIKET5'
Size = 17
end
object T_KRMLARETIKET6: TStringField
FieldName = 'ETIKET6'
Size = 17
end
end
object FontDialog1: TFontDialog
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
MinFontSize = 0
MaxFontSize = 0
Left = 302
Top = 167
end
end